package com.config.shiro;

import lombok.Setter;
import lombok.extern.slf4j.Slf4j;
import org.apache.shiro.cache.Cache;
import org.apache.shiro.cache.CacheManager;
import org.apache.shiro.session.Session;
import org.apache.shiro.session.mgt.DefaultSessionKey;
import org.apache.shiro.session.mgt.SessionManager;
import org.apache.shiro.subject.Subject;
import org.apache.shiro.web.filter.AccessControlFilter;
import org.apache.shiro.web.util.WebUtils;

import javax.servlet.ServletRequest;
import javax.servlet.ServletResponse;
import java.io.Serializable;
import java.util.Deque;
import java.util.LinkedList;

/**
 * 1.读取当前登录用户名，获取在缓存中的sessionId队列
 * 2.判断队列的长度，大于最大登录限制的时候，按踢出规则，将之前的 sessionId 中的 session 域中存入 kickout：true，并更新队列缓存
 * 3.判断当前登录的 session 域中的 kickout 如果为 true，想将其做退出登录处理，然后再重定向到踢出登录提示页面
 */
@Slf4j
@Setter
public class KickoutSessionControlFilter extends AccessControlFilter {

    // 踢出后到的地址
    private String kickoutUrl;
    // 踢出之前登录的/之后登录的用户，默认踢出之前登录的用户
    private boolean kickoutAfter = false;
    // 同一个帐号最大会话数 默认 1
    private int maxSession = 1;

    private SessionManager sessionManager;
    private Cache<String, Deque<Serializable>> cache;

    // 设置 Cache 的 key 的前缀
    public void setCacheManager(CacheManager cacheManager) {
        this.cache = cacheManager.getCache("shiro_kickout");
    }


    /**
     * 是否允许访问，返回true表示允许
     */
    @Override
    protected boolean isAccessAllowed(ServletRequest servletRequest, ServletResponse servletResponse, Object o) throws Exception {
        return false;
    }

    /**
     * 表示访问拒绝时是否自己处理，如果返回true表示自己不处理且继续拦截器链执行，返回false表示自己已经处理了（比如重定向到另一个页面）。
     */
    @Override
    protected boolean onAccessDenied(ServletRequest request, ServletResponse response) throws Exception {
        Subject subject = getSubject(request, response);
        if (!subject.isAuthenticated() && !subject.isRemembered()) {
            // 如果没有登录，直接进行之后的流程
            return true;
        }

        Session session = subject.getSession();
        Object principal = subject.getPrincipal();
        String username = (String) principal;
        Serializable sessionId = session.getId();

        // 读取缓存，没有就存入
        Deque<Serializable> deque = cache.get(username);
        if (deque == null){
            deque = new LinkedList<>();
            deque.push(sessionId);
            cache.put(username, deque);
        }

        // 如果队列里没有此sessionId，且用户没有被踢出；放入队列
        if (!deque.contains(sessionId) && session.getAttribute("kickout") == null) {
            // 将 sessionId 存入队列
            deque.push(sessionId);
            // 将用户的 sessionId 队列缓存
            cache.put(username, deque);
        }

        // 如果队列里的 sessionId 数超出最大会话数，开始踢人
        while (deque.size() > maxSession) {
            Serializable kickoutSessionId = null;
            if (kickoutAfter) {
                // 如果踢出后者
                kickoutSessionId = deque.removeFirst();
            } else {
                // 否则踢出前者
                kickoutSessionId = deque.removeLast();
            }
            // 踢出后再更新下缓存队列
            cache.put(username, deque);


            try {
                // 获取被踢出的 sessionId 的 session 对象
                Session kickoutSession = sessionManager.getSession(new DefaultSessionKey(kickoutSessionId));
                if (kickoutSession != null) {
                    // 设置会话的 kickout 属性表示踢出了
                    kickoutSession.setAttribute("kickout", true);
                }
            } catch (Exception e) {
                log.error(e.getMessage());
            }
        }

        // 如果被踢出了，直接退出，重定向到踢出后的地址
        if (session.getAttribute("kickout") != null && (Boolean) session.getAttribute("kickout") == true) {
            try {
                // 会话被踢出了，退出登录
                subject.logout();
            } catch (Exception e) {
                log.error(e.getMessage());
            }
            saveRequest(request);
            // 重定向
            WebUtils.issueRedirect(request, response, kickoutUrl);
            return false;
        }
        return true;
    }
}
